#include<cstdio>
#include<cstring>
#include<algorithm>
#include<queue>
using namespace std;
const int MAXN=41,MAXT=110,INF=0x3f3f3f3f;
int t,n,k,m,head[MAXN],cnt,dis[MAXT][MAXT],d[MAXN],f[MAXT];
bool vis[MAXN],allow[MAXN][MAXT],can[MAXN];
struct edge
{
	int v,next,val;
}e[MAXN*4];
void addedge(int x,int y,int z)
{
	e[++cnt]=(edge){y,head[x],z};
	head[x]=cnt;
	return;
}
void getcan(int x,int y)
{
	memset(can,false,sizeof(can));
	for(int i=1;i<=n;i++)
		for(int j=x;j<=y;j++)
			if(allow[i][j])
			{
				can[i]=true;
				break;
			}
}
void SPFA(int x,int y)
{
	queue<int>q;
	memset(vis,false,sizeof(vis));
	memset(d,0x3f3f3f3f,sizeof(d));
	d[1]=0;
	q.push(1);
	vis[1]=1;
	while(!q.empty())
	{
		int u=q.front();q.pop();
		vis[u]=false;
		for(int i=head[u];i;i=e[i].next)
		{
			int v=e[i].v;
			if(can[v])continue;
			if(d[u]+e[i].val<d[v])
			{
				d[v]=d[u]+e[i].val;
				if(!vis[v])
				{
					q.push(v);
					vis[v]=true;
				}
			}
		}
	}
	dis[x][y]=d[n];
	return;
}
int main()
{
	scanf("%d%d%d%d",&t,&n,&k,&m);
	int x,y,z;
	for(int i=1;i<=m;i++)
	{
		scanf("%d%d%d",&x,&y,&z);
		addedge(x,y,z);
		addedge(y,x,z);
	}
	scanf("%d",&m);
	for(int i=1;i<=m;i++)
	{
		scanf("%d%d%d",&x,&y,&z);
		for(int j=y;j<=z;j++)
			allow[x][j]=true;
	}
	for(int i=1;i<=t;i++)
		for(int j=i;j<=t;j++)
		{
			getcan(i,j);
			SPFA(i,j);
		}
	memset(f,0x3f3f3f3f,sizeof(f));
	f[0]=0;
	for(int i=1;i<=t;i++)
		for(int j=0;j<i;j++)
		{
			if(dis[j+1][i]==INF)continue;
			f[i]=min(f[i],f[j]+dis[j+1][i]*(i-j)+k);
		}
	printf("%d\n",f[t]-k);
	return 0;
}
